اخفاء اطار الاكسس
|
|
![]() ![]() ![]() |
اخفاء اطار الاكسس
| Enjoy |
Apr 6 2006, 05:48
PM مشاركة #1
|
عضو جديد ![]() المجموعة: اعضاء المشاركات: 28 التسجيل: 10-May 05 رقم العضوية: 49,623 |
شاهدت موضوع للأخت زهرة بعنوان No Access وكان مثال رائع جداً واصبح استخدمة الان ولكن عندي سؤال هل يمكن وضع امر لمرة واحدة ويتم العمل بهذا الامر لكل النماذج في البرنامج اذا كان الجواب نعم فأرجو ارفاق مثال وإذا كان الجواب لا فأرجو الايضاح وشكرا |
| zahrah |
Apr 7 2006, 12:20
AM مشاركة #2
|
مشرفة قسم قواعد بيانات مايكروسوفت أكسس ![]() المجموعة: المشرفين المشاركات: 2,007 التسجيل: 13-July 03 رقم العضوية: 15,367 |
اخي الفاضل السلام عليكم ورحمة الله وبركانه بالنسبة لموضوع اخفاء اطار برنامج الاكسيس بحيث تبقى النماذج هي العاملة او الظاهره امام المستخدم اما اطار البرنامج فيتم اخفاؤه . هذا الامر يتم لمره واحده فقط في النموذج الرئيسي ( يعني اول نموذج تريد ان يكون هو البدايه ) فمثلا يمكن ان يكون شاشة افتتاحية او يمكن نموذج رئيسي وعن طريقه يتم فتح نماذج اخرى . لهذا فإن الكود المسئول عن اخفاء اطار الاكسيس يتم استدعاؤه مره واحده فقط عند الفتح ثم يسري هذا الامر على بقية النماذج والتقارير ولا يوضع في بقية النملذج اي كود بل تبقى كما هي اللهم اننا نقوم بجعل خاصية النماذج او التقارير الى منبثق و شكلي او مشروط الى نعم حتى تكون في المقدمه بدلا ان تكون خلف النموذج الاول . وبما ان المثال لديك المطبق عليه اخفاء اطار الاكسيس حاول القيام بالتجربه وضع 3 نماذج وتقرير وغير خاصية النماذج والتقرير الى منبثق وشكلى او مشروط وانظر النتيجه . -------------------- |
| Enjoy |
Apr 7 2006, 11:18
PM مشاركة #3
|
عضو جديد ![]() المجموعة: اعضاء المشاركات: 28 التسجيل: 10-May 05 رقم العضوية: 49,623 |
الاخت زهرة بعد التحية والاحترام لقد حاولت ولم تنجح المحاولة حيث تم ادراج الامر في القائمة الرئيسية فقط وحينما افتح قائمة اخرى يفتح معها اطار الاكسس وتغلق مع الرجوع للقائمة الرئيسية مع ملاحظة انه يوجد امر اغلاق النموذج الرئيسي في حال فتح اي نموذج اخر (لسبب معين) اذا كان هذا السبب ارجو الافادة مرفق ملف للتجربة لأن البرنامج كبير كثير قائمة رئيسية وقائمة المتدربين فقط الملفات المرفقة AcademyTest.zip ( 137.06k ) عدد مرات
التحميل: 49 |
| zahrah |
Apr 8 2006, 10:50
PM مشاركة #4
|
مشرفة قسم قواعد بيانات مايكروسوفت أكسس ![]() المجموعة: المشرفين المشاركات: 2,007 التسجيل: 13-July 03 رقم العضوية: 15,367 |
تفضل اخي الكريم ملفك بعد التعديل السبب وراء اغلاق النموذج مباشرة هي الاكواد الموضوعة في حدث عند الفتح وقد قمنا بتعليقها لانها تحمل كود اغلاق DoCmd.Close AcademyTest_ZA.rar ( 111.32k ) عدد مرات
التحميل: 30اختكم زهره -------------------- |
| Enjoy |
أمس, 05:21
AM مشاركة #5
|
عضو جديد ![]() المجموعة: اعضاء المشاركات: 28 التسجيل: 10-May 05 رقم العضوية: 49,623 |
كلمة شكر قليلة في حقك انت وجميع الاخوة المشرفين
والمشاركين في هذة المنتديات الابداعية لقد اوشك الوقت على الانتهاء من تصميم برنامج خاص بجهة تدريب حاسب الي وكان الفضل بعد فضل الله في ذلك لكي اختي الكريمة كجزء كبير جدا في حل بعض الاشكالات التي تخيلت بأن ليس لها حل ولا انكر فضل بعض المشرفين والاخوة المشاركين |
| Scoool |
أمس, 07:50
AM مشاركة #6
|
عضو جديد ![]() المجموعة: اعضاء جدد المشاركات: 19 التسجيل: 11-December 05 رقم العضوية: 66,707 |
بليييز Enjoy ممكن رابط الموضوع No Access -------------------- لا يمكنك تعليم الطائر
الطيران .. انما تطعمه حتى يكتب الله له ما يكون من مؤلفاتي : تنصيب فيجوال ستوديو دوت نت تنصيب متطلبات فيجوال ستوديو دوت نت سلسلة تعلم البرمجة بلغة فيجوال بيسك - الجزء الأول |
| Enjoy |
أمس, 12:45
PM مشاركة #7
|
عضو جديد ![]() المجموعة: اعضاء المشاركات: 28 التسجيل: 10-May 05 رقم العضوية: 49,623 |
الاخ Scoool الموضوع مايحتاج رابط ولا شي فقط قم بانزال آخر ملف تم تعديله من قبل الاخت زهرة وستجد مطلوبك فية (ِAcademyTest ZA) وفي حال رغبتك في ادراج الامر في برنامجك قم بنسخ الامر الموجود في حدث عند فتح في القائمة الرئيسية والصقة في قائمة برنامجك الرئيسية |
| icee |
أمس, 05:36
PM مشاركة #8
|
عضو جديد ![]() المجموعة: اعضاء جدد المشاركات: 16 التسجيل: 6-April 06 رقم العضوية: 76,372 |
شلون نقدر انشوف الكود و البرنامج فقط قاعد يعرض لينا
الفورم في صورة عرض و ما نقدر نسوي اي اكسس اليها......, اذا ممكن حط لينه
الطريقة الي قمت فيها او مثل ما قال اخ scoool حط لينا رابط الموضوع NO
Access وجزاك الله خيرا. |
| zahrah |
أمس, 07:40
PM مشاركة #9
|
مشرفة قسم قواعد بيانات مايكروسوفت أكسس ![]() المجموعة: المشرفين المشاركات: 2,007 التسجيل: 13-July 03 رقم العضوية: 15,367 |
لاخفاء شاشة الاكسيس نهائيا اتبع الطريقة التالية 1. اعرض النموذج في وضع التصميم 2. اختر خصائص النموذج وانتقل للتبويب الكل واجعل الخيار منبثق الى نعم شكلي او مشروط الى نعم من اشرطة قوائم الاكسيس 1. اختر ادوات ثم بدء التشغيل 2. ازل علامات الصح من المربعات 3. من خيار فتح تموذج / صفحة اضغط السهم للاسفل واختر النموذج المطلوب الذي سيفتح في بداية التشغيل 4. اختر موافق لوضع الحدث 1. اعرض النموذج في وضع التصميم 2. اختر خصائص النموذج 3. انتقل للتبويب حدث 4. اختر الحدث عند الفتح 5. اضغط على السهم الصغير وسترى عبارة اجراء حدث ثم بإختيارها 6. بجانب السهم الصغير يوجد مربع صغير ... ذو ثلاث نقاط قم بالضغط عليه سيفتح لك محرر الفيجول بيسك او اختصارا لهذه الخطوات قم بالضغط مباشرة على المفتاحين معا في لوحة المفاتيح ALT+F11 وسيفتح لك محرر الفيجول بيسك 7. ضع هذا الكود في حدث عند الفتح CODE
Private Sub Form_Open(Cancel As Integer) fSetAccessWindow (SW_HIDE) End Sub عمل زر انهاء البرنامج بالكامل انشىء زر امر على النموذج وضع في حدث عند النقر هذا الكود CODE
DoCmd.Quit انشاء وحدة نمطية جديده انتقل الى اطار القاعدة وسترى كائنات القاعدة ( جداول - تقارير - استعلامات - نماذج - ماكرو - وحدة نمطية ) اختر الاخيرة ومن ثم اختر جديد الان ضع هذا الكود CODE
Option Compare Database Global Const SW_HIDE = 0 Private Declare Function apiShowWindow Lib "user32" _ Alias "ShowWindow" (ByVal hwnd As Long, _ ByVal nCmdShow As Long) As Long Function fSetAccessWindow(nCmdShow As Long) Dim loX As Long Dim loForm As Form loX = apiShowWindow(hWndAccessApp, nCmdShow) End Function قم بحفظ ما عملت واخرج من القاعدة وبرنامج الاكسيس واعد فتح القاعدة سترى ان شاشة وبنامج الاكسيس مختفي ولا يظهر لك الا النموذج فقط وهذا مثال No_Access_up.rar ( 14.58k ) عدد مرات
التحميل: 7اختكم زهره -------------------- |
| الفيلسوف111 |
أمس, 07:53
PM مشاركة #10
|
عضو ![]() ![]() المجموعة: اعضاء المشاركات: 85 التسجيل: 27-January 05 رقم العضوية: 40,541 |
السلام عليكم الاخت الفاضلة زهرة الله يعطيك الصحة والعافية وعساك على القوه .....الف شكر 1000000000000000000% الاخ الفاضل Enjoy مشكور على السؤال الجيد والى الامام إن شاء الله تحياتي -------------------- طارق العيد |
![]() ![]() ![]() |
| نسخة خفيفة | الوقت الآن: 10th April 2006 - 02:44 PM |